home *** CD-ROM | disk | FTP | other *** search
/ Mods Anthology 1 / Music-AmigaModsAnthology-1of4-Psychodk.mcsteam.iso / Tools / Mac / MACMODP.EXE / MacMod Pro ƒ / Registration Updater / Registration Updater.rsrc / CDEF_40__1994-1995 Ian Mouton.txt < prev    next >
Text File  |  1995-08-14  |  18KB  |  320 lines
  1. start:
  2. 00000000  600E                     bra        +0x10 /* 00000010 */
  3. 00000002  0000 4344                ori.b      D0, 0x44 /* 'D' */
  4. 00000006  4546                     chk.w      D2, D6
  5. 00000008  0028 0000 0000           ori.b      [A0 + 0x0], 0x0
  6. 0000000E  0000 41FA                ori.b      D0, 0xFA
  7. // begin alternate branch 00000010-00000014
  8. label00000010:
  9. 00000010  41FA FFEE                lea.l      A0, [PC - 0x12 /* 00000000, value 0x600E0000 */]
  10. // end alternate branch 00000010-00000014
  11. label00000010: // (misaligned)
  12. 00000012  FFEE                     .extension 0xFEE // unimplemented
  13. 00000014  4E71                     nop
  14. 00000016  4E71                     nop
  15. 00000018  6000 016C                bra        +0x16E /* 00000186 */
  16. fn0000001C:
  17. 0000001C  4A78 028E                tst.w      [0x0000028E /* ROM85 */]
  18. 00000020  6B22                     bmi        +0x24 /* 00000044 */
  19. 00000022  303C 0090                move.w     D0, 0x90
  20. 00000026  A346                     syscall    GetOSTrapAddress, flags=3
  21. 00000028  2248                     movea.l    A1, A0
  22. 0000002A  303C 009F                move.w     D0, 0x9F
  23. 0000002E  A746                     syscall    GetToolBoxTrapAddress/GetToolTrapAddress, flags=7
  24. 00000030  B3C8                     cmpa.l     A1, A0
  25. 00000032  6710                     beq        +0x12 /* 00000044 */
  26. 00000034  225F                     movea.l    A1, [A7]+
  27. 00000036  205F                     movea.l    A0, [A7]+
  28. 00000038  301F                     move.w     D0, [A7]+
  29. 0000003A  2F09                     move.l     -[A7], A1
  30. 0000003C  A090                     syscall    SysEnvirons
  31. 0000003E  3F40 0004                move.w     [A7 + 0x4], D0
  32. 00000042  4E75                     rts
  33. label00000044:
  34. 00000044  206F 0004                movea.l    A0, [A7 + 0x4]
  35. 00000048  303C 0001                move.w     D0, 0x1
  36. 0000004C  2248                     movea.l    A1, A0
  37. 0000004E  6006                     bra        +0x8 /* 00000056 */
  38. 00000050  0313                     btst       [A3], D1
  39. 00000052  0B02                     btst       D2, D5
  40. 00000054  0100                     btst       D0, D0
  41. label00000056:
  42. 00000056  303C 0010                move.w     D0, 0x10
  43. 0000005A  E240                     asr        D0.w, 1
  44. 0000005C  5340                     subq.w     D0, 1
  45. label0000005E:
  46. 0000005E  4258                     clr.w      [A0]+
  47. 00000060  51C8 FFFC                dbf        D0, -0x6 /* 0000005E */
  48. 00000064  32BC 0002                move.w     [A1], 0x2
  49. 00000068  2078 02AE                movea.l    A0, [0x000002AE /* ROMBase */]
  50. 0000006C  337C FFFE 0002           move.w     [A1 + 0x2], 0xFFFE
  51. 00000072  0C28 00FF 0009           cmpi.b     [A0 + 0x9], 0xFF
  52. 00000078  6742                     beq        +0x44 /* 000000BC */
  53. 0000007A  4A28 0008                tst.b      [A0 + 0x8]
  54. 0000007E  6E20                     bgt        +0x22 /* 000000A0 */
  55. 00000080  337C FFFF 0002           move.w     [A1 + 0x2], 0xFFFF
  56. 00000086  4A78 028E                tst.w      [0x0000028E /* ROM85 */]
  57. 0000008A  6B30                     bmi        +0x32 /* 000000BC */
  58. 0000008C  337C 0001 0002           move.w     [A1 + 0x2], 0x1
  59. 00000092  4A78 0B22                tst.w      [0x00000B22 /* HWCfgFlags */]
  60. 00000096  6A24                     bpl        +0x26 /* 000000BC */
  61. 00000098  337C 0002 0002           move.w     [A1 + 0x2], 0x2
  62. 0000009E  601C                     bra        +0x1E /* 000000BC */
  63. label000000A0:
  64. 000000A0  4269 0002                clr.w      [A1 + 0x2]
  65. 000000A4  0C28 0002 0008           cmpi.b     [A0 + 0x8], 0x2
  66. 000000AA  6E10                     bgt        +0x12 /* 000000BC */
  67. 000000AC  6708                     beq        +0xA /* 000000B6 */
  68. 000000AE  337C 0004 0002           move.w     [A1 + 0x2], 0x4
  69. 000000B4  6006                     bra        +0x8 /* 000000BC */
  70. label000000B6:
  71. 000000B6  337C 0003 0002           move.w     [A1 + 0x2], 0x3
  72. label000000BC:
  73. 000000BC  4269 0004                clr.w      [A1 + 0x4]
  74. 000000C0  0C38 0002 012F           cmpi.b     [0x0000012F /* CPUFlag */], 0x2
  75. 000000C6  6E0A                     bgt        +0xC /* 000000D2 */
  76. 000000C8  1038 012F                move.b     D0, [0x0000012F /* CPUFlag */]
  77. 000000CC  5240                     addq.w     D0, 1
  78. 000000CE  1340 0007                move.b     [A1 + 0x7], D0
  79. label000000D2:
  80. 000000D2  4A78 028E                tst.w      [0x0000028E /* ROM85 */]
  81. 000000D6  6B0E                     bmi        +0x10 /* 000000E6 */
  82. 000000D8  0838 0004 0B22           btst.b     [0x00000B22 /* HWCfgFlags */], 0x4
  83. 000000DE  6706                     beq        +0x8 /* 000000E6 */
  84. 000000E0  137C 0001 0008           move.b     [A1 + 0x8], 0x1
  85. label000000E6:
  86. 000000E6  0C78 3FFF 028E           cmpi.w     [0x0000028E /* ROM85 */], 0x3FFF
  87. 000000EC  6206                     bhi        +0x8 /* 000000F4 */
  88. 000000EE  137C 0001 0009           move.b     [A1 + 0x9], 0x1
  89. label000000F4:
  90. 000000F4  1038 021E                move.b     D0, [0x0000021E /* KbdType */]
  91. 000000F8  41FA FF5B                lea.l      A0, [PC - 0xA5 /* 00000055, value 0x303C00 '0<\0' */]
  92. 000000FC  323C 0004                move.w     D1, 0x4
  93. label00000100:
  94. 00000100  B020                     cmp.b      D0, -[A0]
  95. 00000102  57C9 FFFC                dbeq       D1, -0x6 /* 00000100 */
  96. 00000106  5241                     addq.w     D1, 1
  97. 00000108  3341 000A                move.w     [A1 + 0xA], D1
  98. 0000010C  4A38 0291                tst.b      [0x00000291 /* PortBUse */]
  99. 00000110  6B18                     bmi        +0x1A /* 0000012A */
  100. 00000112  1238 01FB                move.b     D1, [0x000001FB /* SPConfig */]
  101. 00000116  0201 000F                andi.b     D1, 0xF
  102. 0000011A  0C01 0001                cmpi.b     D1, 0x1
  103. 0000011E  660A                     bne        +0xC /* 0000012A */
  104. 00000120  2078 02DC                movea.l    A0, [0x000002DC /* ABusDCE */]
  105. 00000124  1368 0007 000D           move.b     [A1 + 0xD], [A0 + 0x7]
  106. label0000012A:
  107. 0000012A  3378 0210 000E           move.w     [A1 + 0xE], [0x00000210 /* BootDrive */]
  108. 00000130  4A78 03F6                tst.w      [0x000003F6 /* FSFCBLen */]
  109. 00000134  6D44                     blt        +0x46 /* 0000017A */
  110. 00000136  4269 000E                clr.w      [A1 + 0xE]
  111. 0000013A  323C 003C                move.w     D1, 0x3C /* '<' */
  112. label0000013E:
  113. 0000013E  4267                     clr.w      -[A7]
  114. 00000140  51C9 FFFC                dbf        D1, -0x6 /* 0000013E */
  115. 00000144  204F                     movea.l    A0, A7
  116. 00000146  3178 0A58 0018           move.w     [A0 + 0x18], [0x00000A58 /* SysMap */]
  117. 0000014C  7008                     moveq.l    D0, 0x08
  118. 0000014E  A260                     syscall    FSDispatch/HFSDispatch, flags=2
  119. 00000150  6624                     bne        +0x26 /* 00000176 */
  120. 00000152  3168 0034 0016           move.w     [A0 + 0x16], [A0 + 0x34]
  121. 00000158  A207                     syscall    GetVolInfo/PBHGetVInfo/HGetVInfo, flags=2
  122. 0000015A  661A                     bne        +0x1C /* 00000176 */
  123. 0000015C  2168 005A 0030           move.l     [A0 + 0x30], [A0 + 0x5A]
  124. 00000162  217C 4552 494B 001C      move.l     [A0 + 0x1C], 0x4552494B /* 'ERIK' */
  125. 0000016A  7001                     moveq.l    D0, 0x01
  126. 0000016C  A260                     syscall    FSDispatch/HFSDispatch, flags=2
  127. 0000016E  6606                     bne        +0x8 /* 00000176 */
  128. 00000170  3368 0016 000E           move.w     [A1 + 0xE], [A0 + 0x16]
  129. label00000176:
  130. 00000176  4FEF 007A                lea.l      A7, [A7 + 0x7A]
  131. label0000017A:
  132. 0000017A  2049                     movea.l    A0, A1
  133. 0000017C  225F                     movea.l    A1, [A7]+
  134. 0000017E  5C4F                     addq.w     A7, 6
  135. 00000180  3EBC EA84                move.w     [A7], 0xEA84
  136. 00000184  4ED1                     jmp        [A1]
  137. label00000186:
  138. 00000186  4E56 0000                link       A6, 0
  139. 0000018A  48E7 0310                movem.l    -[A7], D6,D7,A3
  140. 0000018E  266E 000E                movea.l    A3, [A6 + 0xE]
  141. 00000192  7E00                     moveq.l    D7, 0x00
  142. 00000194  204B                     movea.l    A0, A3
  143. 00000196  A069                     syscall    HGetState
  144. 00000198  1C00                     move.b     D6, D0
  145. 0000019A  302E 000C                move.w     D0, [A6 + 0xC]
  146. 0000019E  0C40 000B                cmpi.w     D0, 0xB
  147. 000001A2  6226                     bhi        +0x28 /* 000001CA */
  148. 000001A4  43FA 003C                lea.l      A1, [PC + 0x3C /* 000001E2, value 0xFFCEFFDA */]
  149. 000001A8  D040                     add.w      D0, D0
  150. 000001AA  D2F1 0000                add.w      A1, [A1 + D0.w]
  151. 000001AE  4ED1                     jmp        [A1]
  152. 000001B0  3F2E 0012                move.w     -[A7], [A6 + 0x12]
  153. 000001B4  2F0B                     move.l     -[A7], A3
  154. 000001B6  4EBA 0098                jsr        [PC + 0x98 /* 00000250 */]
  155. 000001BA  5C8F                     addq.l     A7, 6
  156. 000001BC  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  157. 000001C0  2F0B                     move.l     -[A7], A3
  158. 000001C2  4EBA 01C2                jsr        [PC + 0x1C2 /* 00000386 */]
  159. 000001C6  2E00                     move.l     D7, D0
  160. 000001C8  508F                     addq.l     A7, 8
  161. label000001CA:
  162. 000001CA  1006                     move.b     D0, D6
  163. 000001CC  204B                     movea.l    A0, A3
  164. 000001CE  A06A                     syscall    HSetState
  165. 000001D0  2D47 0014                move.l     [A6 + 0x14], D7
  166. 000001D4  4CDF 08C0                movem.l    D6,D7,A3, [A7]+
  167. 000001D8  4E5E                     unlink     A6
  168. 000001DA  205F                     movea.l    A0, [A7]+
  169. 000001DC  4FEF 000C                lea.l      A7, [A7 + 0xC]
  170. 000001E0  4ED0                     jmp        [A0]
  171. 000001E2  FFCE                     .extension 0xFCE // unimplemented
  172. 000001E4  FFDA                     .extension 0xFDA // unimplemented
  173. 000001E6  FFE8                     .extension 0xFE8 // unimplemented
  174. 000001E8  FFE8                     .extension 0xFE8 // unimplemented
  175. 000001EA  FFE8                     .extension 0xFE8 // unimplemented
  176. 000001EC  FFE8                     .extension 0xFE8 // unimplemented
  177. 000001EE  FFE8                     .extension 0xFE8 // unimplemented
  178. 000001F0  FFE8                     .extension 0xFE8 // unimplemented
  179. 000001F2  FFE8                     .extension 0xFE8 // unimplemented
  180. 000001F4  FFE8                     .extension 0xFE8 // unimplemented
  181. 000001F6  FFE8                     .extension 0xFE8 // unimplemented
  182. 000001F8  FFE8                     .extension 0xFE8 // unimplemented
  183. fn000001FA:
  184. 000001FA  4E56 FFF0                link       A6, -0x0010
  185. 000001FE  48E7 0030                movem.l    -[A7], A2,A3
  186. 00000202  4267                     clr.w      -[A7]
  187. 00000204  3F3C 0002                move.w     -[A7], 0x2
  188. 00000208  486E FFF0                pea.l      [A6 - 0x10]
  189. 0000020C  4EBA FE0E                jsr        [PC - 0x1F2 /* 0000001C */]
  190. 00000210  4A2E FFF9                tst.b      [A6 - 0x7]
  191. 00000214  548F                     addq.l     A7, 2
  192. 00000216  672E                     beq        +0x30 /* 00000246 */
  193. 00000218  486E 0008                pea.l      [A6 + 0x8]
  194. 0000021C  A870                     syscall    LocalToGlobal
  195. 0000021E  486E 000C                pea.l      [A6 + 0xC]
  196. 00000222  A870                     syscall    LocalToGlobal
  197. 00000224  42A7                     clr.l      -[A7]
  198. 00000226  486E 0008                pea.l      [A6 + 0x8]
  199. 0000022A  AA27                     syscall    GetMaxDevice
  200. 0000022C  265F                     movea.l    A3, [A7]+
  201. 0000022E  2053                     movea.l    A0, [A3]
  202. 00000230  2468 0016                movea.l    A2, [A0 + 0x16]
  203. 00000234  2252                     movea.l    A1, [A2]
  204. 00000236  0C69 0001 0020           cmpi.w     [A1 + 0x20], 0x1
  205. 0000023C  6F04                     ble        +0x6 /* 00000242 */
  206. 0000023E  7001                     moveq.l    D0, 0x01
  207. 00000240  6006                     bra        +0x8 /* 00000248 */
  208. label00000242:
  209. 00000242  7000                     moveq.l    D0, 0x00
  210. 00000244  6002                     bra        +0x4 /* 00000248 */
  211. label00000246:
  212. 00000246  7000                     moveq.l    D0, 0x00
  213. label00000248:
  214. 00000248  4CDF 0C00                movem.l    A2,A3, [A7]+
  215. 0000024C  4E5E                     unlink     A6
  216. 0000024E  4E75                     rts
  217. fn00000250:
  218. 00000250  4E56 FFEE                link       A6, -0x0012
  219. 00000254  486E FFF4                pea.l      [A6 - 0xC]
  220. 00000258  A874                     syscall    GetPort
  221. 0000025A  206E 0008                movea.l    A0, [A6 + 0x8]
  222. 0000025E  2050                     movea.l    A0, [A0]
  223. 00000260  2D68 0008 FFF8           move.l     [A6 - 0x8], [A0 + 0x8]
  224. 00000266  2D68 000C FFFC           move.l     [A6 - 0x4], [A0 + 0xC]
  225. 0000026C  206E 0008                movea.l    A0, [A6 + 0x8]
  226. 00000270  2050                     movea.l    A0, [A0]
  227. 00000272  4A28 0010                tst.b      [A0 + 0x10]
  228. 00000276  6700 010A                beq        +0x10C /* 00000382 */
  229. 0000027A  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  230. 0000027E  2F2E FFF8                move.l     -[A7], [A6 - 0x8]
  231. 00000282  4EBA FF76                jsr        [PC - 0x8A /* 000001FA */]
  232. 00000286  4A40                     tst.w      D0
  233. 00000288  508F                     addq.l     A7, 8
  234. 0000028A  6700 00F6                beq        +0xF8 /* 00000382 */
  235. 0000028E  2F2E FFF4                move.l     -[A7], [A6 - 0xC]
  236. 00000292  A873                     syscall    SetPort
  237. 00000294  3D7C 7530 FFEE           move.w     [A6 - 0x12], 0x7530 /* 'u0' */
  238. 0000029A  3D7C 7530 FFF2           move.w     [A6 - 0xE], 0x7530 /* 'u0' */
  239. 000002A0  3D7C 7530 FFF0           move.w     [A6 - 0x10], 0x7530 /* 'u0' */
  240. 000002A6  0C6E 0001 000C           cmpi.w     [A6 + 0xC], 0x1
  241. 000002AC  6646                     bne        +0x48 /* 000002F4 */
  242. 000002AE  4878 001E                push.l     0x1E
  243. 000002B2  A862                     syscall    ForeColor
  244. 000002B4  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  245. 000002B8  7001                     moveq.l    D0, 0x01
  246. 000002BA  D06E FFF8                add.w      D0, [A6 - 0x8]
  247. 000002BE  3F00                     move.w     -[A7], D0
  248. 000002C0  A893                     syscall    MoveTo
  249. 000002C2  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  250. 000002C6  3F2E FFFC                move.w     -[A7], [A6 - 0x4]
  251. 000002CA  A891                     syscall    LineTo
  252. 000002CC  3F2E FFFA                move.w     -[A7], [A6 - 0x6]
  253. 000002D0  3F2E FFFC                move.w     -[A7], [A6 - 0x4]
  254. 000002D4  A891                     syscall    LineTo
  255. 000002D6  486E FFEE                pea.l      [A6 - 0x12]
  256. 000002DA  AA14                     syscall    RGBForeColor
  257. 000002DC  3F2E FFFA                move.w     -[A7], [A6 - 0x6]
  258. 000002E0  3F2E FFF8                move.w     -[A7], [A6 - 0x8]
  259. 000002E4  A891                     syscall    LineTo
  260. 000002E6  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  261. 000002EA  3F2E FFF8                move.w     -[A7], [A6 - 0x8]
  262. 000002EE  A891                     syscall    LineTo
  263. 000002F0  6000 008A                bra        +0x8C /* 0000037C */
  264. label000002F4:
  265. 000002F4  0C6E 0002 000C           cmpi.w     [A6 + 0xC], 0x2
  266. 000002FA  6644                     bne        +0x46 /* 00000340 */
  267. 000002FC  486E FFEE                pea.l      [A6 - 0x12]
  268. 00000300  AA14                     syscall    RGBForeColor
  269. 00000302  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  270. 00000306  7001                     moveq.l    D0, 0x01
  271. 00000308  D06E FFF8                add.w      D0, [A6 - 0x8]
  272. 0000030C  3F00                     move.w     -[A7], D0
  273. 0000030E  A893                     syscall    MoveTo
  274. 00000310  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  275. 00000314  3F2E FFFC                move.w     -[A7], [A6 - 0x4]
  276. 00000318  A891                     syscall    LineTo
  277. 0000031A  3F2E FFFA                move.w     -[A7], [A6 - 0x6]
  278. 0000031E  3F2E FFFC                move.w     -[A7], [A6 - 0x4]
  279. 00000322  A891                     syscall    LineTo
  280. 00000324  4878 001E                push.l     0x1E
  281. 00000328  A862                     syscall    ForeColor
  282. 0000032A  3F2E FFFA                move.w     -[A7], [A6 - 0x6]
  283. 0000032E  3F2E FFF8                move.w     -[A7], [A6 - 0x8]
  284. 00000332  A891                     syscall    LineTo
  285. 00000334  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  286. 00000338  3F2E FFF8                move.w     -[A7], [A6 - 0x8]
  287. 0000033C  A891                     syscall    LineTo
  288. 0000033E  603C                     bra        +0x3E /* 0000037C */
  289. label00000340:
  290. 00000340  4878 0021                push.l     0x21 /* '!' */
  291. 00000344  A862                     syscall    ForeColor
  292. 00000346  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  293. 0000034A  3F2E FFF8                move.w     -[A7], [A6 - 0x8]
  294. 0000034E  A893                     syscall    MoveTo
  295. 00000350  3F2E FFFA                move.w     -[A7], [A6 - 0x6]
  296. 00000354  3F2E FFF8                move.w     -[A7], [A6 - 0x8]
  297. 00000358  A891                     syscall    LineTo
  298. 0000035A  3F2E FFFA                move.w     -[A7], [A6 - 0x6]
  299. 0000035E  3F2E FFFC                move.w     -[A7], [A6 - 0x4]
  300. 00000362  A891                     syscall    LineTo
  301. 00000364  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  302. 00000368  3F2E FFFC                move.w     -[A7], [A6 - 0x4]
  303. 0000036C  A891                     syscall    LineTo
  304. 0000036E  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  305. 00000372  7001                     moveq.l    D0, 0x01
  306. 00000374  D06E FFF8                add.w      D0, [A6 - 0x8]
  307. 00000378  3F00                     move.w     -[A7], D0
  308. 0000037A  A891                     syscall    LineTo
  309. label0000037C:
  310. 0000037C  4878 0021                push.l     0x21 /* '!' */
  311. 00000380  A862                     syscall    ForeColor
  312. label00000382:
  313. 00000382  4E5E                     unlink     A6
  314. 00000384  4E75                     rts
  315. fn00000386:
  316. 00000386  4E56 0000                link       A6, 0
  317. 0000038A  7000                     moveq.l    D0, 0x00
  318. 0000038C  4E5E                     unlink     A6
  319. 0000038E  4E75                     rts
  320.